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INTRODUCTION 


In this report we present listings of the source listings 
and a number of test cases to exemplify the use of the computer 
codes employed to calculate flows about 2-D inlets in a super- 
sonic free stream and to generate computational grids. The 
program that calculates 2-D inlets flow fields makes use of an 
implicit algorithm to solve the 2-D time-dependent Euler equa- 
tions (ref. 1). The mesh generation program (ref. 2) uses the 
algorithm developed in reference 3 to generate nonorthogonal 
grids . 

Problem formulation, mathematical framework and the overall 
logic of the programs are presented in a separate report (ref. 4) . 
In the first part of this report we present the input data, speci- 
fication of initial and boundary conditions, operating instructions 
and answer listings obtained from the 2-D Euler solver for a 
drooped-cowl inlet. The test case involves supercritical inlet 
operation at a subdesign Mach number, M =2.09. In the second 
part of this report input data, boundary conditions and answer 
listings are presented for the mesh generation program. Complete 
listings of the codes are given in Appendices A and B. 


2. THE CODE FOR THE CALCULATION OF 2-D INLET 
FLOW FIELDS (THE EULER CODE) 


In this section we present the input data, specification of 
initial and boundary conditions and answer listings for the 
drooped-cowl inlet (fig. 1) for which the design Mach number is 
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INLET CAPTURE AREA = 58 . 1 CItl 


Figure 1.- Isentropic-compression , drooped-cowl 
inlet configuration. 

M =3.00. Free stream conditions at = 2.09 are prescribed as 
initial conditions. The incident ramp shock is captured by 
starting the integration downstream of the ramp leading edge and 
placing six points on the inflov/ boundary downstream of the ramp- 
leading edge shock. Values of flow variables at these locations 
are found from oblique shock tables (ref. 5) . Initialization of 
flow variables is done in SUB.INITIA. 

The sample input data for the 46x22 grid is given in section 
2.1. The output listings from the computer program are given in 
section 2.2 and contour plots (obtained via a library subroutine 
at NASA/Ames Research Center) are presented in section 2.3. 

2.1 Program Use and Operation 

In this section we give a detailed description of the input 
information required to run a typical test case, e.g., calcula- 
tion of the drooped-cowl inlet. The initial field as well as 
values of various constants are evaluated in SUB.INITIA. This 
subroutine also reads the input data except for the last card, 
which specifies geometry and the type of duct-outflow boundary 
condition to be used. This last card is read by SUB.BC. We now 
list the input data cards in order: 
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Card No . 

Format 


Variables 

„ ^ 

1 

815 

1 

NMAX; 

Maximum number of time steps 



JMAX: 

Maximum number of points along C/ 
where ? is the coordinate along 
the body. 



KI4AX; 

Maximum number of points along n / 
where n is the coordinate that 
crosses C- 



NP; 

Incremental number of time steps 
after which SUB. MAP is called. 
The function of SUB. MAP is de- 
scribed in reference 4. 



METH: 

Flag for upwind differencing. If 
METH > 0, program skips upwind 
differencing . 



I READ : 

Option for grid system. If READ 

> 0, reads grid from disc (file 
number 3) , 



INVIS: 

If INVIS > 0, program accounts for 
viscous effects; if INVIS = 0, the 
calculation is inviscid 

2 

715 

IREGO: 

If IREGO > 0, reads initial field 
from disc, otherwise starts from 
free stream conditions. 



ISTORE: 

If ISTORE > 0, solution data 
stored on disc (file number 4) . 



JTAILl: 

First ^-interior point, set to 1. 



JTAIL2 : 

Last ^“interior point, set to 
JMAX-1 



IPLOT: 

Index for calling plot routine. 

If set to zero it skips the plot 
routine. Otherwise calls the 
routine at the specified interval. 

3 

315 

lUPWIND: 

If lUPWIND > 0, skips upwind dif- 
ferencing . 



lOSCIL: 

Not relevant to this implementa- 
tion of this code. Set IOSCIL=0. 



LAMIN: 

If LAT4IN >. 0, calculates turbulent 
viscosity. 

4 

8F10 . 0 

CNBR: 

Courant number; set to about 10 
(see ref. 4) . 
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Card No. Format 


FSMACH; 


ALPHA: 

XOSCIL 

VARA 

VARB 

VARC 

LFAC: 
JAXI : 


Variables 


x-increment used in SUB. GRID. Fo 
grid read off the disc set DX=0. 

y-increment, as above. 

Free stream Mach number. 

Pseudo viscosity coefficient. Se 
to about 10 times the time step. 

Used in SUB. GRID. Here set EPS=0 

Reynolds number. In case of 
inviscid calculation set to about 
106. 

Angle of attack. 


Not relevant to this implentation 
of this code. For the inlet cal- 
culation set to zero. 

If LFAC = 1 outflow is subsonic, 
otherwise it is supersonic. 

If JAXI = 0 flow is plane 2-D, 

If JAXI = 1 flow is axisymmetric . 




Sample Input for Test Case 


SCO 

46 22 

10 0 1 0 

CARD 1 

)t ? : 4 5 c : 

1 i t: u :: :6 

•’ 1 It :: 22 j: 7 * ii :s i; :• j: 35 w 35 :s 3 ? 3S %: «. 4 : 4 : *4 <5 <s 4 - 

4i p :: :: t- '■ Si :i :■ e. ‘. j sr £■* e* :• '7 :? 

1 

i 0 

0 £ 4S 0 

2 

i 4 S 6 ? 

e 9 *.C n >2 :3 i« Vj '-i 

!* 7i \s .'0 2 : Zi 24 :r .h /■ 3 * ;s 30 :: *2 3534 3:3! 3 ; :•« :5 40 41 42 43u 4- 

4 i 4 $ :c r>. i: n S4 n *•! s' :b v. s* e3 84 n se v t-g 49 k 7 r 

i 

0 00 


3 

|i ? ;■ 4 5 E 7 

1 2 ;j 7 ; 1 : 13 u \i j 

’ 8 IS :o r 3L' ;s :s ■'3 /’> 2 i n ..o 2 : x 33 :4 35 35 d: ii 33 «r- 41 *: 43 44 /; <f. 47 

*3 4 ? 3C ‘7 5 ; ;3 Si 5: :• IS 5a EC Z\ SI z) ?* ('> 6t f? ?? 

10.000 

. Oi 

.01 £.090 .1000 

0. 0 100 0 00. 4 0 . 0 

|V 7 C ‘ 5 5 

S 9 7 : r :: 73 t4 lit 

• 1 IS 20 0 zr 2 :- 2< 25 2i /• Ji J3 ;it :• 0 33 W jJ 35 37 3£ . j ;C Q *: 4 : 44 4« <e 4'- 

*s 4j j: !* n > 55 s: ;a Sa i; :• s: a £4 ri csT is '3 r ' ■■■ 

i. 0 



U1 

(1 2 ; 4 5 S ! 

k 9 7 .' n 1 : n u I9 • 


*; 4? 50 ?; s? S4 ss tg s, ;i *s i-s ci s: e) E4 as g/. es « j i; 

0 


TFFFFFFFFFFFFFFF 

FFFFFFF7T 5 

jt 7 5 4 5 ? 7 

t 5 7G 11 1 : 73 ;• T 

: C ^ 0 r- D 7 * 0 '■=- 0 0 -c 0 3 : i; n D 0 :? C Q *- B “ Q B 

•; 0 5i G 5. 0 5 . 0 '5 0 -* G 9 5-’ SI E< 1 ; Bf. r f« =- 1- '■ i' 
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1 •’ i T'c r 

a 5 ■: 17 •: u 7 . t 

•' s is 20 :* 2 : r *< 71 "i ■ ?:• • :• j: 3: 34 :-s '' n 2 : *:• *: *: 41 44 »c 4 - 

43 47 j[- 5' :3 5* S3 « ;■ .8 li" r: ti 'I* { - S;. ?• 5f 

1 
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P ' * 5 G ? 

a 9 1 ’ i; I’ !• 1 : '• 

4 ’s .c 7 :c «T ?« "5 ?? ?s ' 0 1 : '.3 ‘.4 :s *i :: *j 4 ; »4 ♦* :• 

i! 4* :c !' 5: S'* 54 5' 'f i'. :? ss:: g. •; &< c; r* •> • 


1 1 0 U 1 I I ! I I I I I I I ( I I I I I I 7 T 1 7 7 


1 1 ; 7 4 5 e : 1 0 - n 13 

8 ’s /o :7 :: ?e :s .■'S /• r: :5 

• • r J’ 73 34 35 ;E 31 35 4C 45 *7 43 *4 ** *7; 4 43 4T 3C '* 

5 ; :] 5 * 5! =6 5. :a I : :: :: 

E: :1 £4 i'j :: M f? ’0 ’ 

5 0 

j ' j .7 4 5 6 : 8 2 7i'i u >: 7 ; 14 i3 K •- 

4 7-- 21 ; :• 22 :: 2 : ■; /■ 21 72 


5 ; ;? 54 55 «6 55 ;a 55 n C' 

10 


#1 

V 'J 0 £ 

1 r : 4 

■’.111 

2 2 2 2 

1 : 3 ; 

3 3 3 3 

4 4 4 4 

12 3 4 

5 7 5 5 

e 6 6 5 

12 3 4 

7 7 7 / 

8 8 8 a 

I 2 ’ 4 

9 3 5 S 


P p P <1 ^ 


nil 

2 2 2 2 

5 6 7 E 
1 1 


: 0 G 

'■ li 
1 1 1 

2 2 2 

3 3 3 

4 4 4 

:i 17 '3 

5 5 5 

6 8 6 
ii i: I] 

7 7 7 


:i 12 13 

S 3 3 


0 u n 

M '! ■: 

1 1 1 

2 2 2 

■4 IS -I 

3 3 3 

4 4 4. 

H 15 IE I 

5 5 5 1 

6 6 6 1 
H !5 IE : 

7 7 7 
i 3 8 

u 15 !S 

3 3 3 


0 : : 0 c 0 0 G c D 

'5 '5 :c “ :::i :s n 

1 n 1 n n 1 1 


D e 0 0 

1 i 1 1 


0 s c 0 ; c c c 0 0 c 0 0 

1- 1- 42 4* 44 42 ;5 47 


2 2 2 2 2 2 2 2 2 2 
'I ’? ?c y 2 : ■: li :* :? :< r? -i :: :: :•* 

333333333333333333 


0 0 c c 

n 11 n 1 1 11 n 1 11 1 1 

22222222 


2 2 2 2 2 2 2 2 2 2 2 2 2 

15 15 3 : II IS 40 47 4 7 41 44 45 !7 4' 

3333333333333 


C C 0 0 

<4 4J 5* 3! 

nil 

2222 

44 4 . y. 5 

3 3 3 3 


0 0 0 D 0 C 2 C G 

5: i: 54 5: :i 57 5i !i iC 

n 11 1 n 1 1 

2 2 2 2 2 2 2 2 2 

l; 51 54 5 5 56 5' 7157 

333333333 


! 0 D 
1 1 1 
2 2 2 
3 3 3 


D G 2 C 
nil 
2 2 2 2 


C 2 C C f 
n 1 n 
2 2 2 2 2 
3 3 3 3 3 


4 

j 

4 

4 

4 

4 

4 

4 

4 

4 

4 

4 

4 

i 

( 

4 

< 

•» 

4 

4 

4 

4 

4 

4 

4 

4 

4 4 

4 


4 

4 

4 

4 

4 

4 

•t 

4 

4 

4 

4 

4 


4 4 

i 

■* 

4 

•t 


4 

4 


:: 


is 

26 


31 

28 

3C 

2! 

2: 

23 

?.4 

*5 

3C 

:: 

31 

33 

<0 

41 

42 

43 

44 

45 

4S 

41 

4849 

s: 

5; 

52 

53 

54 

55 

SE 

s: 

5S 

f? 

52 


s: 

£3 

64 V. 

£6 

r 

£3 

£: 

70 



c; 

5 

5 

5 

5 

5 

5, 

,5 

5 

5 

C 

5 

5 

5 

5 

5 

5 

5 

5 

5 

5 

5 

5 

5 

5 

5 5 

5 

5 

5 

5 

5 

5 

5 

5 

5 

= 

5 

5 

5 

5 

5 : 

5 

e 

- 

5 

C 

Cl 

5 

6 

6 

6 

6 

6 

6 

6 

6 

6 

6 

6 

6 

6 

6 

6 

6 

6 

6 

6 

6 

6 

6 

6 

6 

6 

E 6 

6 

5 

6 

6 

6 

6 

6 

6 

E 

6 

6 

6 

B 

6 

6 6 

8 

6 

8 

s 

6 

c 

6 

23 


2? 

:e 

i7 

28 

79 



:: 

23 

34 

3i 

35 

3- 

38 

23 

40 

41 

*2 

43 

U 

45 

45 

4* 

4? 4: 

50 

t: 

52 

!3 

54 

$5 

56 

5? 

58 

58 

s: 

8! 

ir 

S3 

•:« £5 

S-: 

c; 


5; 

:: 

r 


1 

1 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 7 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 

7 7 

7 

7 

7 

7 

1 

1 

7 


8 8 8 3 8 8 8 8 8 8 8 8 8 6 a 8 8 3 3 8 8 8 8 C 3 8 8 8 8 8 8 8 3 3 S 8 8 3 8 8 3 S 3 3 3 E 3 8 S 3 8 8 ! 8 6 3 

17 It 19 73 :i i: :i :< !s :: u ;9 lo 7: i: u » iv x n it »'4o 41 42 4144 <545 4 - 4 - 43 50 51 51 ii S4 55 s. >' 51 5 i !c ei e: t- s- 51 si r i: 

5 3 5 9 3 9 S 3 9 9 S 3 9 ? 9 9 S a 9 9 3 9 5 9 9 S 9 9 9 S 2 3 9 3 9 9 S 9 3 3 S S 3 3 9 9 9 3 3 3 9 C 3 5 9 


!T*l- 10 ; 400.. 
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2.2 Output Listings 


WiAX,JM«X, KMAX.NP.METH, IHKftt), INyiS 10 •<» 
IR£GO,i:TOHE.NF,ne,JTHILl,JThli;>.IPLOr 1 J 
lUPWtiO.IOSCIL.LRMIN I 0 0 


0 


111 

V 



CNBR . FSMUCH , SMJ , EP S . Hf . AtPHrt 

10, OOOCOOCOOO 2 , 0’'O^,^-OOvjlX) . I -OCaXi* 0 . c>V.i ■ »•••••»■*»»■*■* 0. OCCO'j'-OiZ'CXD 


XOSCIL 

. 100000t»0l 
1 


.171Sl£.0a 

.2H2 30E.02 

.UOC'V2fc'*OC 

.II1677E.02 

. 60i'« L'<E • 

<-2 

. li 

.'•-.•■f *1V5 

.2l'^2^.L*CZ 

. 385730*03 

.S9in7E«03 

.H9531E.03 

.50M7L*C3 

.£229t£.C3 


•: 

. ' 

-1 *-:.s 

,£tMc*.tr03 

.S.’iIClE* /5 

.S3ed4£.03 

.B689‘i£.C3 

.nc.-.i *Oi 

.17167t..>t 

.3S/1 »t* 


.Ml 

' \ ‘L *• 

.4£ :i.‘ r*C'i 

.4 30‘.?t. *■ *1 

.MTiJBLtiOH 

.69937t.OH 

. il^ -'i *C j 

.t7--,.:.;£...s 

.eti'i' i.* 


. e. 

1 * 4 

.MLL' • *U»4 

. 5 a '-X *'>♦ 

.5HBi9E«04 

.6S71Bl.;7I 

. 3L»i f iL •(>♦ 

. 1191 . L.ctt 

. lO*."--* * 

>♦ 


' > L * ■ i 

.47 li -XtCi 

.3S7lBttC:.3 

,H‘I553E«03 

. 36319E.03 


. 152/Bt.C)i 


•> 

.ml 

o,T.»C2 



K> 2 










,122HlE«02 

.1722'i£.02 

.2lHl7t'*Ca 

.257B7E.C2 

,4363 /f . 

;•> 

.71 

W--'L*02 

. I45 70t*03 

.2S35?L*G3 

.320O7E«03 

.31MO£.03 

.31 ?^^'L•05 

.Sl'-illL.Ol 

.3.1S-U • 

03 

. 3.’ 

< 1 li 3 

. 32 0ii. *0 ! 

.3r:!/iL.05 

.3222SE.03 



i: '1 .u5 

. > .’-i * 


IM 

' ;'..i »I>4 

. wc »1>4 

. •«>< 

,31239f.04 

. 3-167-iE.CH 

. i.?: tpf .Ch 

. 51 ■ ’ £...rt 

* *t • 

»♦ 


■ 1 4.1^* 


• I’l 

.20230e*0M 

. I'lS'y 1£ .i>l 

. 1 1-'. - »i 

.3.1 ..-S 

.M* *1. . 1 ♦ 

■ 

'1 

. • r • 1 3 

..>1 .05 

. lftulit.*G3 

.20131E.03 

, 16 /6'll. (Ill 


. 7 1».| il .02 

. 3 )t..j M . 


. .. '• 

'... *1 



«;• 3 










,922S6E»01 

. 129SC< .02 

. 161 SU f02 


.3 3m 3*-t • 


. 5 r 


.C3 

. 177O(C:.0i 

,2199SE»03 

.2;9i,v,t:.o3 


.2l-«, yt *05 

.O'i 


. 

• . i ...5 

*C5 

.;^iM:cf *03 

,2256dE«03 

.3CH7‘lE.03 

.hm: jBt .03 

.£*80;£.65 

.7666. L» 

.3 

. 9 

. ♦.'1 'C: 

. iin.'E*LH 


.129lSF.#OM 

.1205‘E.09 

. lGftn-4. »Oi 


.90. 

a 

. l- 

*31 . >< 

*C3 

.9.-'! 4 •O’i 

,8S627E»C3 

.769 7Ce.03 

.517«1L*C5 

.31 !•.»£. 03 

.’L- 

.5 

. I- 

* 4 •Li 

.U617l*02 

. IOmti W ».j5 

,ni3HE»03 

.86S71E.02 
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. l*» 
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<• H 
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-J 

1 
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. 7 /'ii.t-l *0.7 
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. I'l 7i, .U .0 3 
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. iMO l x *01 

.16158t»03 

.2i>(5 .’£.05 


. 3 .'.t il ..j5 

'i • 

3 

. M ** 


.£1 

. 5 i (. t .4. • £ * 3 

.S1019E*03 

.‘I7H1E.03 

.43 3 1 n *01 

.HlUlt.C 1 

.MC 3 -6-t • 

. 3 

. '• 

■ 

. ' .-dl *03 

.:7;.rE*..5 

.3S02HE.03 

.31029t .03 
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* 

!• • 
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3. 


THE MESH GENERATION CODE 


In This section we present the input data, answer listings 
and plots for the inlet geometry shown in figure 1. The com- 
putational grid is generated as a 46x22 mesh. 

3.1 Program Use and Operation 

In this section we give a description of the input infor- 
mation required to run a typical test case, e.g., the 
calculation of a nonorthogonal grid for the drooped-cowl inlet. 
Various subroutines have been modified to accommodate a flexi- 
bility for input data for the present calculations. 

Input data is read by PROGRAM. MAIN in the following order: 


Card No. 

Format 


Variables 

1 

315 

JWAKE : 

Number of grid points in the x- 
direction in the wake including 
the trailing edge point. Set to 
1 for the present calculations. 



KMAX: 

Number of grid points in the y- 
direction . 



MAXIT: 

Number of iterations to be used 
in creating the unclustered 
grid . 

2 

8F10. 0 

XGMX: 

x-direction coordinate of rear- 
ward boundary. 



XGMN : 

x-direction coordinates of front 
boundary. 



YMAX: 

y-direction coordinate of top 
boundary . 



YMIN: 

y-direction coordinate of bottom 
boundary . 



XNOSE: 

x-direction coordinate of lead- 
ing edge of cowl . 



XTAIL: 

x-direction coordinate of trail- 
ing edge of cowl. 
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Format 


Variables 


Card No. 


XRAMP: 


3 

4 


FIO.O 

4F10.0 


DXl: 

XORG: 
YORG; 
ETAC : 
BETA; 


x-direction coordinate of lead- 
ing edge of ramp. 

Minimum y-increment on rearward 
boundary for initial conditions. 

Location on the x-axis of the 
special clustering origin. 

Location on the y-axis of the 
special clustering origin. 

Angle (in degrees) , about which 
angular clustering is done. 

Parameter determining the 
strength of angular clustering. 
For equal-angular distribution 
set to zero. Otherwise values 
in the range 1 to 5 . 


5 


FIO.O 


OMEGA: Parameter for Thompson solver, 

values between 0 to 2 recom- 
mended . 


6 

7 


Flo . 0 
A71 


DY2 : Minimum y-direction spacing for 

final clustering. 

Title on each SC4020 plot resulting from 
each run. 


8 


A80 


Description of the cowl. 


9 

10 
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2F10.0 


Cards 9, 10, ... - All cards following 
card 9 contain in columns 1 to 10 and 
11 to 20 two floating-point numbers, x 
and y, respectively, which are coordi- 
nates of points on the cowl surface 
defining the airfoil shape. The points 
should be ordered counterclockwise. 


55 


2F10.0 


Cards 55, 56, ... - Coordinates of the 

ramp, inflow boundary and outer boundary. 


82 


It should be noted that the number of points in the C“direc- 
tion (along the body) is specified in PROGRAM. MAIN by assigning 
an integer value to the variable NBOD. We have further modified 
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SUB. OUTER such that it allows the boundary points along the ramp, 
inflow boundary and the outer boundary to be specified point by 
point. For each different geometry, these boundary points must 
be prescribed in SUB. OUTER, 
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Sample Input for Test Case 





£m E4 H 



12. 

3.375 


11 

CZl ♦S'- 

1 9 :: w n ^ '3 '* 'C r; :: 2* :• i: ■’s /■ 25 := .3 : i? 03 is is 3* is is 4S 41 17 -sj u 4; •:• n *1 >• « 

j-j 54 5£ « 5; :a ss s: n ?< rj sc 3 

53 ' 5 ' • • 

icf. 

3.573 ' 


12 

fl H < 5 £ 7 

8 ! 11 M :z u ’j * •■■ -8 ;a 20 7: 2: :: 24 25 :s .•• ?i :? «.■ y n v 3; 35 37 35 :j <i *■ *: 43 44 4. 45 n sc ;■• f 

: 53 54 55 “e 55 :•* *:■ jc 51 s: £3 54 i\ 5c •: 

' 6! £9 ]' • •• * 

9. 

3 . 575 


13 

FTm 6 7 

1 9 75 11 u 53 H 15 58 '5 '3 ;C T. Ti 2Z 74 25 .'9 t‘ 2« ?S 4O 3‘ 32 15 34 25 38 32 38 35 45 <5 *7 <3 « *i <4 4 - 4! 43 55 y ! 

‘r n 54 55^6 i) :s >s:; :i sz s: E4 65 65 8 
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8 . 3.5314 14 


) 1 G 5 4 S 6 ? 1 

1 9 50 H 11 53 14 13 •£ 8 li r 22 ?• 2< 25 76 /- 23 75 '0 3 : 37 33 34 J 5 2 « 37 30 5? C- «» *7 43 <4 4* *«: 47 i? 43 jC ? ! 

•; *3 54 55 '6 57 IF 59 5C 67 63 64 65 66 r’ o9 F9 70 T. V * 

7.5 

3.4704 

15 

i ■ LI :• 4 s b 7 1 

1 9 50 1« U 13 't* 53 '6 !' •• IB 20 :■ 22 23 2* 2: /' 25 23 r 32 33 34 3a 28 37 31 33 42 4i 42 43 44 4« <S 4 4,4? 32 • 

•1 53 54 55 ''t S3 :» -.V t: S3 54 65 ?•'. 59 '7 :: • •; 
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Si6 3.0b£,' 


CARD 

33 

;• 4 5 e 7 1 j u -.3 u >5 

•• 1b /‘J .V 27 25 24 25 7& /• 23 23 JO 2: 32 33 34 3$ 31 37 39 23 45 4| 42 4J 44 45 <V *3 «3 2C 

1 s: S3 54 55 53 :a 59 SS C1 62 cj S4 63 56 ?7 

5a s? :: .• 1? 

80S 3.0599 



34 

: 3 4 5 e 7 • 9 ;o tt n t.1 u 13 :fi r 

• r. /O 7: 22 :3 24 23 .TS /■? 2o 23 Ji7 2' 32 33 34 35 37 38 33 «C <i 42 O 44 45 -:H 4. 4} 43 :C : 
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GlC -• ' 8 3 ■? H 5 ^3 ;< iS '.8 ” -I la ?qV ?;?? N ?5:S /• 2a28Va 3! 32 33 3* 3£ j S 3 7 38 :? *v *> *2 43*4 <R 4‘. iS4? 53 ?: II 53 5< 55 5T :i l^'.Z 52 H S4 tb 85 T 58 fj 


3. b 
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1.1 .194 
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3,3 Plots of the Generated Mesh 
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APPENDIX A 


SOURCE LISTING OF THE 2-D INLET 
CALCULATION PROGRAM 
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WRITEI 6. 101 I RESID INLET 415 

lOI F0RMAT(IX,«RESI0UAL*«.E12.5I INLET 416 

RETURN STEP 43 
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APPENDIX B 
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RETURN AXIS 

END AXIS 



lit 1. n 1 1 1| M ■ I i»M‘ M iM‘ » *■ < »■ Ml M» M » J liJ 1 1 > ^ 1 » UJ < 1 1 tiJ liJ U 
CDQClODCDCDCD£D(DCDOQOOCDCDCDCDCD£DCDCD£DCOCD 


J (/> CO (£) > 

— • — rg nj 

•XXXV • UJ 
j •< — -< z V »- 


4 — Q. 

j Lij M z: 

■ X — UJ _IUJ 
-I- 

: o — u> z z 

-JO — a: 

J UJ — V o 

JCD z»-o 

C C O O UJ z 

) _IO U C£ UJ 


OOOCMJO 


159 





ooooooooooooooooo 

-I— 

Q-Q_CLQ-Q-CLCLQ_Q_£l.ll.CLQ-CLa.Q.Q- 


u 

z 

UJ - 

CL • >- — 

— 

o 


zoc 

^ CO in — 


< 

CL 

O UJ 

cr n z — 


cr 

CD 

»- 

< • • X 


»— 

z 

(/)!- 

z in cc — 




— O 

• in UJ o > 


fNJ 

>- 

_J 

— O z X 

>- 



UJ CL 

— ID OC •< — 


I— 

X 

z 

— o - 

X 

GL 


— o 

>- - — 


o 

»- 

1 - rg 

•OJ z o > 

OC 


o 

30 

— ^ — UJ 

03 


_l 

o ^ 

— V — Z 

z 


a 

CLO 

— — 


(£) 


CDt/) 

X >— UJ o — ■ _> 

> 

r> 

UJ 

3 

CL CC • CC — 

h- 

V. 

z 

LOUJ 

z ^ < 03 '• _r 

o 

(O 

— 

I 

O OC Z Z — 3UJ 

-J 


-C Z> CL 

■)C/100ZZ<Z 

— q: ct 

- — K- O _J Z> 


160 



a 


00 




a 

5 

<j 

cn 

►- 

o 

_j 

Q. 


X 

H- 

s; 


o 

X 


tn 

cc 

c 

X 


— — o 


— o 
h- fN 
D O 
O ^ 

cc o 
CD cn 
r) 

in Lli 


in ► 


^ ^ — • 
X — IT 

— X X 


~ CD 

to O ^ ^ 
X — If) IP 


Z O O _J — 


X — — o 


■ X X X — 

to oo u occ z 
cr 'n q: 

c 0» _J “3 


oooooo 


cc 

CD 

z> 


161 



iH ■■■ I u I ^miiiiiiia till ■ III ■iiiiiiii 


1. Report No. | 2. Government Accession No. 

NASA CR-3221 j 

3. Recipient's Catalog No. 

4. Title end Subtitle CALCULATION OF TWO-DIMENSIONAL INLET 
FLOW FIELDS IN A SUPERSONIC FREE STREAM - PROGRAM 
DOCUMENTATION AND TEST CASES 

5. Report Date 

March 1980 

6. Performing Organization Code 

512/C 

7. Author(s) 

S. H. Bir ingen and 0. J. McMillan 

8. Performing Organization Report No. 

NEAR TR 195 

10. Work Unit No. 

9. Performing Organization Name and Address 

Nielsen Engineering & Research, Inc. 
510 Clyde Avenue 
Mountain View, CA 94043 

17. Contract or Grant No. 

NASl-15305 

13. Type of Report and Period Covered 

Contractor Report 
3/1/78 to 4/30/79 

12. Sponsoring Agency Name and Address 

National Aeronautics and Space Administration 

Washington, DC 20546 

14. Sponsoring Agency Code 

15. Supplementary Notes 

Langley Technical Monitors: Wallace C. Sawyer and 

Charlie M. Jackson, Jr. Final Report 


16. Abstract 

The use of a computer code for the calculation of 2-D inlet 
flow fields in a supersonic free stream and a nonorthogonal mesh- 
generation code are illustrated by specific examples. Input, 
output and program operation and use are given and explained for 
the case of supercritical inlet operation at a subdesign Mach 
number (Moo = 2.09) for an isentropic-compression , drooped-cowl 
inlet. Source listings of the computer codes are also provided. 


17. Kev Words (Suggested by Author(sl) 

calculation method 
inlets 

supersonic flow 
inviscid flow 


18. Distribution Statement 


Unlimited - Unclassified 

Subject Category 02 


' 1 

19. Security Classif. (of this report) 

20- Security Classif. (of this page) 

I 21. No. of Pages 

22 . Price* 

Unclassified 

Unclassified 

1 163 

$8.00 


*For sale by the National Technical Ir.forrnation Service, Springfield. Virginia 22161 


NASA-Langley, 1980 




